Private Casting/Casting One.bin/Docs/Models.dir/00014.ls

Text File | 1998-02-21 | 665 b | 26 lines

on mouseEnter
  cursor([cast "curs", cast "mask"])
  set the castNum of sprite 1 to the number of member "fondo rebajado"
  set the castNum of sprite 2 to the number of member string(the currentSpriteNum - 2)
  set the visible of sprite 2 to 1
  set the visible of sprite (the currentSpriteNum + 6) to 1
  updateStage()
end

on mouseLeave
  cursor(-1)
  set the castNum of sprite 1 to the number of member "fondo normal"
  set the visible of sprite 2 to 0
  repeat with x = 9 to 14
    set the visible of sprite x to 0
  end repeat
end

on mouseUp
  global chica
  cursor(-1)
  set chica to numToChar(the clickOn - 2 + 64)
  go(1, "interview")
  puppetSound(0)
end